ExposedMembers.GameEvents = ExposedMembers.GameEvents or {};
ExposedMembers.GameEvents = GameEvents;

local iKaraKhanidKhanGhilman = GameInfo.Units["UNIT_KARA_KHANID_KHAN_GHILMAN"].Index;
function KaraKhanidKhanGhilman_OnPillage (playerID, unitID, iImprovement, iBuildingType)
	local pPlayer = Players[playerID]
	local pPlayerUnits = pPlayer:GetUnits()
	local pUnit = pPlayerUnits:FindID(unitID)
	if pUnit:GetType() == iKaraKhanidKhanGhilman then
		pUnit:ChangeDamage(-25)
	end
end
GameEvents.OnPillage.Add(KaraKhanidKhanGhilman_OnPillage)



function AddGreatPeoplePoints(playerID, gppID, amount)
    local player = Players[playerID]
    if player ~= nil then
        player:GetGreatPeoplePoints():ChangePointsTotal(gppID, amount)
    end
end

GameEvents.SekkaGetGreatPeoplePointsSwitch.Add(AddGreatPeoplePoints);